﻿
Imports osi.root.utils

Friend Class case_info
    Public ReadOnly name As String = Nothing
    Public ReadOnly [case] As [case] = Nothing
    Public finished As Boolean = False

    Public Sub New(ByVal name As String, ByVal [case] As [case])
        assert(Not String.IsNullOrEmpty(name))
        assert(Not [case] Is Nothing, name)
        Me.name = name
        Me.case = [case]
    End Sub
End Class